home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Cream of the Crop 11
/
Cream of the Crop 11-1.iso
/
utility
/
horst_2.zip
/
H4.BAT
< prev
next >
Wrap
DOS Batch File
|
1995-12-18
|
2KB
|
62 lines
@echo off
:AGAIN
cls
echo ┌───────────────────────────────────┐
echo │ H-P LASERJET 4 Ser. (PCL5) │
echo │ │
echo │ » 1 - Reset Printer │
echo │ » 2 - Form Feed │
echo │ » 3 - Elite 12.0 cpi │
echo │ » 4 - Univers Medium 9 / 8 │
echo │ » 5 - Univers Bold 16 │
echo │ » 6 - Courier land. 10 │
echo │ » 7 - Compressed 16.6 │
echo │ » 8 - Spreadsheet (landscape) │
echo │ » 9 - Comp/A4/85LP/LM10/Portr │
echo │ » A - Courier/line drawing chars. │
echo │ │
echo │ ESC Escape │
echo └───────────────────────────────────┘
pmenue /E99
for %%a in (0 1 2 3 4 5 6 7 8 10 99 255) do if errorlevel %%a set ?=%%a
goto L-%?%
:L-1
qecho ESC,"E" > prn
goto AGAIN
:L-2
qecho FF > prn
goto AGAIN
:L-3
qecho ESC,"&k4S" > prn
goto AGAIN
:L-4
qecho ESC,"(8U",ESC,"(s1p9.0v0s0b4148T",ESC,"c&l8D" > prn
goto AGAIN
:L-5
qecho ESC,"(8U",ESC,"(s1p16.0v0s3b4148T" > prn
goto AGAIN
:L-6
qecho ESC,"&l1O",ESC,"8",ESC,"(s0pLF.0h0s0b4099t" > prn
goto AGAIN
:L-7
qecho ESC,"&k2S" > prn
goto AGAIN
:L-8
qecho ESC,"&l1o2e5.647c66F",ESC,"&k2S" > prn
goto AGAIN
:L-9
qecho ESC,"&l26A",ESC,"&l85P",ESC,"&a10L",ESC,"(8U",ESC,"(s0p12h0s0b4099T",ESC,"&l8D" > prn
goto AGAIN
:L-10
qecho ESC,"(10U",ESC,"(s0p10h0s0b4099T" > prn
goto AGAIN
:L-99
goto END
:L-255
echo Error: PMENUE can not find a valid menu on screen
pause
:END
set ?=
cls
exit